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EDITORIAL NCTES 


Last months mag was rather Latter than I expected - the 
delay on my part got multiplied by the printers backlag 
before Easter and some confusion regar.ring delivery. I am 
creeping back onto schedule. 


Unacknowledged Contributions. 


I apologise to those whose contributions I have published 
but not labelted. The reason for this igs that there name 
was not on their contributions, which tend to get sorted 
Into appropriate piles and processed very rapidly. Covering 
Letters are not always passed on to me, especially if they 
have material for some other committee member. The cartoons 
In this issue were kindly created by Ricardo De Les, while 
Anne F. is the author of ‘somethina bigger" and a couple of 
other contributions this issue (pick her style?3. 
Hall of Fame 

As a number of recent correspondents have noted, this hasn't 
changed much for ages. Is no one playing games any more? 
Anyway, next month any scores which have been posted far 
more than six months will be wiped. Any new entries will be 
welcome. 


Beablet is Edited by Bruce Wills whe can gometimes be found 
on 861-662 (home) or 729-929 x40? (work). 


DISCLAIMER 
The views of the reviewers, the Editor and other 
contributors are not necessarily shared by the BEC/ACORN 
COMPUTER USER GROUP NZ CINC). 


A GLOSSARY 
of COMPUTER LANGUAGE 


Source: Systems Resources Ltd (unwittingly) 


ACCESS TIME - The time between the|ANALOG COMPUTER- Machine to measure the 
instant at which information is called| timber in a virgin forest. 

for and the instant at which management 

expects the final report, These jARITHMETIC SHIFT - Preferred apparel for 
"instants® occur between one tick of |female programmers. 


clock and the next. 
ASSUMED DECIMAL POINT - Located two 


ANALYST - Anyone who sd designates [positions to the right of programmer’s 
themselves, estimate of their own worth, 
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B-BOX - A hive 
BLOCK DIAGRAM - Schematic gibberish. 


CHARACTER - omecne interested in 
computers (see also Special Character) 


CHAINING - method of attaching 
programmers to desks to speed up output. 


COBOL - Two people having fun. 
CODE - A respiratory ailment 


COMMON LANGUAGE - The first thing a 
programmer must forget to be successful. 


CRYOGENIC FILM - A sad movie on hygiene. 
CYCLE - Halt a bicycle. 


DATA FLOW DIAGRAH - Unstable block 
diagram. 


DANGER: 240,000 MILLIVOLT SOURCE - 
Standard 240 volt wal! plug. 


rg PRECISION - Ten fingers on each 
ah a 


ERROR ~ what someone else has made wren 


they disagree with your computer output. 


EXTERNAL STORAGE - Wastebasket. 


FIXED WORD LENGTH - Four letter words 
used by programmers when in a state of 


confusion. 


JNDEX REGISTER - Constant source of 
irritation. 


KEY PUNCH OPERATOR - Best informed 
sources regarding weaknesses in the 
system, new large scale computers, and 
the best bars in town, 


LATENCY - Normal arrival at work. 


LOd ORDER POSITION - Programmers 
position in the chain of command. 


MACRO - The last half of an expression 
of surprise : as in "Holy macro!” 


| MAINTENANCE MANUAL - A Mexican Handyman 


(see JBM), 
MATHEMATICAL MODEL - 42-24-38 
OPTICAL SCANNER - censored 


PROGRAN IMPLEMENTATION - 
people and expand the office. 


PULSE TRANSFORMER - censored 
RANDOM ACCESS - Promiscuous 
UNDER CONSIDERATION - Never heard of it. 


UNDER ACTIVE CONSIDERATION - We’re 
looking in the files for it. 


VARIABLE WORD LENGTH - Stammering. 
ZERO SUPPRESSION - Absolute freedon. 


Hire more 





TTPTTTPTTTT ETT TEAST ET TTT TTT TTT TTT TT tt ttt tt tt ttt ttt ttt 


4 
PIPES S OSI Eee eee eee TOTO 


Watford Sideways Ram Board 


Richard Jack, Nelson 


A short abe! to a #H in the Christmas Beeblet regarding the 
Watford MK.2 Rom/Ram board which came without any operating 
instruction. 


Yes, there was a review in Acorn User, just a month after we had 
received our board. The reviewer gave me a strong impression 
that he did not like it and gave it eleventh out of twelve 
boards compared. You wouldn’t buy one after reading that review 
but when I re-read “the criteria for choosing an expansion board 
"in the April issue I also read that amongst the major problems 
of fitting expansion boards was “when fitted with {2 or more 
devices it becomes quite heavy ,leading to difficulties if the 
computer is moved...." I was relieved he had really not been 
serious at all .The board is well and settled in... write 
protect and battery-backup switches had to be fitted to get 
round certain situations but all appears to be well and the 
board will run any of the rom programs tried to date. 


Maybe our Ed. could find someone able to give suitable 
definitions to some of these terms (and others) often associated 
with sideways ram - 


cmos Cc 34 
dynamic a. 


fast 
shadow 

static etc. Li 

Ed’s Notes: Gu 

I am not sure exactly what you are interested in discussing in 
relation to sideways RAM, however the above terms fall into two 
broad areas- 


{/ the physical electronic components and their characteristics 
2/ the nature and operation of sideways RAM. 


Electronic components: 


There are a growing number of electronic devices, in the form of 
silicon "chips", associated with computer memory. These can be 
broadly divided into two groups: those that the computer 
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processor can only read from (i1Ke a record player "reads" 
records), and those that it can both write (fie. save 
information) ta, and read the information back from. 


The first group comprise: 

~ROMs (Read Only Memory), normally supplied by manufacturers or 
software houses with programs etc indelibly etched in them; 
-PROMs (Programable Read Only Memory), which are ROMS which can 
be loaded with data (programed) by either manufacturers or 
hobbists; 

~EPROMS (Electrically Programable Read Only Memory) which can 
recily be programed (given the appropriate hardware) and 
subsequently erased (using ultraviolet light through a window in 
the chip) and re-programed; 

-EEPROMS (Electrically Erasable Programable Read Only Memory). 


The list goes on. 


The devices of interest in the second group comprise various 
types of RAM (Random Access Memory). RAM can be thought of as a 
large array of cells, each of which can be individually 
addressed by the computer processor (ie any cell may be 
addressed at random) to read or write information. RAM is so 
designated to distinguish it from serial devices (such as shift 
registers) which comprise a sequence of cells, into which Gata 
can only enter or leave though an end - like cassette tapes 7 

> you have to wind them through until you reach the data you 
want. The RAM label is misleading - you generally have “random 
access" ROMs also’ | 


Memory can also be classified inte volatile (turn off the power 
and it forgets ail the information stored in it) and 
non-volatile. ROM falls into the latter category: RAM is 
normally volatile. 


RAM chips have various characteristics in terms of power 
consumption and speed depending on the materials (generially 
mainly silicon) and method of manufacture. CMOS chips for 
instance generally require very little power when they not being 
actively addressed (for reading or writing), and are thus 
suitable for battery backup se your don’t lose the data they are 
storing. They also have other desirable characteristics as 
regards interference from other devices (useful eg. in an 
industrial situation). CMOS RAM is however more expensive than 
equivalent speed ordinary RAM. 


RAM speed relates to how quickly the memory devices can respond 
to requests from the computer processor to store or retreive 
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information. Typical speeds range from 150 to 650 ns. It is 
relevant to the extent that the faster the processor, the 
shorter the time available for the memory to respond if the 
processor is not to be held up waiting for the data it wants to 
be transfered to or from it. 


"Static" and "Dynamic" RAM chips are also available. The latter 
is of simpler construction and cheaper, but has to be 
periodically "refreshed" - ie each cell has to be read every few 
moments otherwise it will lose its data. Both are volatile ie 
need the power on all the time to retain their data. The type 
(static/dynamic) of RAM memory makes little practical difference 
unless you intend to build your own memory boards. 


Memory organisation 


"Shadow memory" means much the same thing as “sideways” RAM. 
The Beeb’s 6502 processor is capable of addressing what can be 
thought of as a matrix containing some 65,000 ("64K") cells, 
each of which can store eight binary digits (or two alphanumeric 
characters). This is divided up into blocks as illustrated on 
page 500 of the UG. Some 16K (from hexidecimal address 8000 up 
to BFFF, or the area between the top of screen memory to the 
bottom of the Operating System) is marked "4 paged ROMs eg 
BASIC". This reference is to the 4 sockets in the Beeb into 
which you can plug ROMs ( includes EPROMs etc), and one of which 
is normally occupied by the BASIC ROM. Now, each of these ROMs 
occupy the same 16K block of memory (ie they sit sideways from 
this section of the memory map) - but only one is addressed, or 
paged in, at the time. It is relatively simple to switch, or 
page, blocks of RAM into (and out of) this space as required - 
thus sideways RAM. Shadow RAM refers to RAM which can be 
switched into the address space normally occupied by ROM. 


StS tS Sap aS Sp Sp Sp poo 
ek ed ed red Ped Whe Wad Fed rad Pred Pod Pod Fad Fad Fad Fae re 
SHS StS GSS all 
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SOMETHING BIGGER: 
ve Writing longer programs 


Comes the time you want to write a program that does more than 
can be handled by a couple of PROCs. This series will take you 
through a fairly straightforward game and give you some idea of 
Just how much work is really involved, as well as offering some 
techniques for your own adaptation. 


THE GAME: 

Certain people who ought to remain nameless have used the 
computer so much for playing Snapper, and been playing it so 
badly, that Pacman has got out of the maze and into the maze of 
RAM chips inside your computer, and is now busy gobbling up 
bytes of its memory instead of dots on the screen. He is 
"amenable" to guidance however, and the player’s task is to lead 
him out with the minimum loss of memory. 


GAME STRUCTURE: 
Games appear to have three parts to them: 
{. Instructions 
2. the Game itself 
3. Some way of ending, with high scores etc. 


From the programmer’s point of view however, there are several 
more stages, invisible to the player: 

{. Set up all the shapes (user-defined characters), choose the 
colours, set up variables needed by the program. 

2. Print out the instructions for the player, allow enough time 
to be read, and provide some way of moving on... 

- Set up the screen picture board to play on. 

- Get and analyse voves made by the player 

. Action these moves on screen and within the program 

6. Update the scoreboard 

7. At the end, produce the “High Score" or whatever the 
equivalent will be. | 

8. Clean up ie return colours, Key actions etc to normal. 


Nn S WJ 


This month well deal with points i-3; or as the player sees it, 
part i. The program has been written to be as 
machine-independant as possible, and easily convertible to other 
screen modes toc. There is one quirk which we don’t meet this 
month (thank goodness!!) 


THE LISTING 


LIPIVPAVPIPA IFIP ASIA IPD FIFI IFPI 999999999 99949499999994994994 
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Line 10 makes it easy for you to track down errors when they 
occur within the program; at the end of the series it will be 
rewritten slightly to be more useful. 

10 ON ERROR REPORT:PRINT" @ line ";ERL:STOP 

Lines 20-70 are comments, for future reference. AS you can see; 
it was written almost a year ago for another reason. 


Lines 80-180 are what programmers love to call "the main line" - 
that is, it begins at the beginning and goes to the end 
supplying bare bones only. It looks more like the player’s idea 
of the program than the programmer’s, but it gives the casual 
‘reader’ an idea of what the program goes through. 


PROCset_up 

In the game, this version of an Acorn computer (the Neutrino?) 
has got 32k of RAM made up of RAM chips holding i, 2, 3, or 4 
bytes cof memory in each. (1024 bytes makes ik, so this 32k has 
32,768 bytes). A little impractical, but that’s poetic licence 
for you! Anyway, we will need to define shapes to represent 
each of the possible 4 RAM chips used. Here characters 225-228 
are used. I always define characters using hexadecimal for 
reasons stated in previous issues of ‘Beeblet’. 


Pacman can move in 4 directions, so we’ll need 4 shapes to 
represent which way he is going (CHR$229, 231, 233, 235), plus 
his mouth (230,232,234,236). This is because his mouth is to be 
a different colour to the rest of him. 


Something is needed to show the chips eaten out by Pacman (237), 
and some way to show the exit the player is aiming for (224) 


COLOURS: 

Mode i offers you the choice of 4: red, yellow, white and black. 
Instead of a yellow Pacman, how about a blue one, and to show 
his mouth opens and shuts, let’s cheat and use a flashing 
blue/yellow, so when it is shut it is blue like the rest of him, 
and yellow when it’s open, all with no further effort on the 
programmer’s part. Lines 350 and 360 cope with this change to 
the actual colours displayed: | 

350 VDU1I9,1,11,0,0,0 


Line 370 switches off the cursor on a Mode! B BBC; I’m not sure 
how the Electron would do it. Might be in its User Guide. 
370 VDUZ3;11,0;0;0;0 


CO-ORDINATES 
Throughout the game,, we’re not using graphics co-ordinates to 
move round the screen, but text ones as used by PRINT TABIX,Y), 
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and X% and Y% will be used to represent where Pacman is at the 
present time (whenever that will be). So to start the game he 
will always be at the top column, and down 2 rows from the top 
of the screen. 

380 X% = 0: YA = 2 


We will also want to Know where he was just before the player 
moved him, ta Know where to place an "eaten chip" shape. This 
is the "old X" and “old Y", or OX%, OY%. At the start of a 
game, the old position is the same as the current position, so 
it can be pre-set here too: 
390 OX% = X% 3: OYA = YY 


OTHER: 

Because we will be Keeping track of how much memory Pacman has 
eaten up, we'll need a variable, "memory%", set up - initially 
at zero because he doesn’t start eating until the player starts 
playing!! 

400 memory% = 0 


KEYS USED TO PLAY: 

A lot of games use such Keys as "U" for Up, "D" for down etc, or 

"A" up "Z" down “<" left ">" right or some other variation. 

We're going to use the cursor Keys for the player to manoeuvre 
0 


Pacman. do this easily, *FX4,1 makes these Keys return an 
ASCII value along the same lines as the other keys on the 
Keyboard. 

410 *FxX4,1 


PROCinstructions 
First of all, simulate the screen of a computer that’s just been 
switched on. Pause tc allow the player to assimilate this 
(after all, he just typed in on the screen "CHAIN PACBEEB", and 
now expects something to happen), then throw a spanner in the 
works: “Bug Error" and “Bad Program”. 


310 wait = INKEY‘100) 

"wait" is a variable. The computer is being told to wait for 

i00 hundredths of a second ({ second here) before carrying on 
with its next instruction (this method also allows the player to 
hurry through by pressing a key rather than wait a full second). 
tL is a different way of waiting used at line 730 also using 


730 REPEAT UNTIL INKEY<(-99) 

In this instance, the computer has to wait until the space bar 
has been pressed. The value it sends (as listed in the User 
Guide), is -99, so the computer Keeps looking at the Keyboard 


PIPIFFIII PIF FIP PFPA DIFF FIFI III 99999999499 999-994599499439999 
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for this Key and this key only. It’s an elementary reading test 
for the player? 

INKEY with a positive number will wait the specified length of 
time OR until any key is pressed; INKEY with a negative number 
will wait until the Key returning that value is pressed, and no 
other. (Or alternatively, until you turn the computer off - a 
little drastic). 


The rest of this PROC deals with setting out the instructions on 
screen, including how to print ‘unprintable’ characters (those 
not on the Keyboard), and how to insert colour in the text. 


10 ON ERROR REPORT:PRINT" @ line ";ERL:STOP 
20 REM Lost Memory 

30 REM Pacman got out of his program! 

40 REM BBC/Acorn Computer User Group NZ Inc 


50 REM *x# Broadcast on Access Radio #*% 
Se REM another hot-house project May ’85 
80 MODEI 


90 PROCset_up 
100 PROCinstructions 
CLS 


120 PROCfill_screen 
130 REPEAT 
1460 PROCge t_move 
i350 PRINTTAB(S,1)"He has eaten “smemory4’A;" bytes" 
160 UNTIL X% = 39 AND Y% = 30 
170 PROCfina!l 
END 


200 DEF PROCset_up 

210 VDUZ3, 224 ,&7E ,&7E ,&7E ,&7A, KE AE A&E &7E 
220 YDUZ3, 225,420 810 888,444,822 811,808,804 
230 VDU23, 226 .&49 ,&92 ,&24,&49 292 224 249 R92 
240 VDU23, 227 ,&55 4A £55 &AA £55,800 ,&55, AA 
250 VDU23,228,&FF ,&FF ,&FF &FF &FP aE PP AP 
260 YDU23,229 AIC ,&3E ,&6F AZF AIF &OF ASE &IC 
270 YDU23, 230 ,&00 ,&00 ,&00 ,&40,&40 470 &00 800 
280 VDU23, 231 .&38,&7C ,&FS,&FE AFC RFC &7C £38 
290 VDUZ3,232,&00 ,&00 400 ,&02.£06,&0E, 400, &00 
300 VDU23,233,&3C ,&7E ,&FF &FF&DB AGE £04 &00 
310 YDU23,234,&00 ,&00 ,&00 ,&00,4&30 ,&30 .&38 &O0 
320 VDU23,235,&00 ,&18,&7E ,&DB AFF AFF &7E &3C 
330 VDU23, 236 ,&3C ,&18,&18,&00 £00 .&00.&00 ,&00 
340 YDU23 237 ,&00',&00 .&7E&42,&42 842 &7E 800 
350 YbU19,1,11,0,0,0 


PPPPPPPIFIPP AIA IF FID III 9994 49499499499999499994999999949994 
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360 VDU19,2,4,0,0,0 
370 VDU23;11,0;0;0;0 
380 X% = 0: YR= 2 

390 OX% = X%: OYX = YR 
400 memory%® = 0 

410 «FX4,1 

420 ENDPROC 

430 


440 DEF PROCinstructions 

450 PRINT" BBC Computer 32k" 

460 PRINT’ BASIC" 

470 PRINT’">RUN" 

480 wait=INKEY(200) 

490 PRINT‘ Bug Error" 

500 PRINT’ Bad Program" 

310 wait=INKEY(i00) 

520 PRINTTAB(0,30)"Press SPACE BAR to HELP" 
530 REPEAT UNTIL INKEY(-99) 

540 CLS 

2990 PRINTSPCiS"HELP ME!" 

060 wait=INKE Y(i00) 

570 PRINT PACMAN has escaped from his program," 
580 PRINT‘ and is now gobbling up all my memory." 
590 wait=INKE Y(200) 

600 PRINT’Please push him out." 

610 PRINT‘'! will show you a memory map, and you" 
620 PRINT’ must move him out the door °; 

630 COLOUR2:PRINTCHR$224:COLOUR3 

640 PRINT’“but make sure he eats as little more“ 
650 PRINT"of my memory as possible." 

660 wait=INKE ¥(200) 

670 PRINT’’SPC10;CHR$225;" is 1 byte of memory" 
680 PRINT’SPC10;CHR$226;" is 2 bytes of memory" 
690 PRINT’SPC10;CHR$227;" is 3 bytes of memory" 
700 PRINT’SPC10;CHR$228;" is 4 bytes of memory" 
740 PRINT’‘“Use the cursor Keys to manoeuvre him." 
720 PRINTTAB(0,31)"Press SPACE BAR to start"; 
730 REPEAT UNTIL INKEY(-99) 

740 ENDPROC 

750 

760 DEF PROCfill_screen 

770 LOCAL X%sY% 

780 FOR Y%=2 TO 30 

790 FOR X%=0 TO 39 

800 VDUSI XN Y%A224+RND(4)) 

&10 NEXT X% 

820 NEXT Y% 

830 VDU31,39,30,17,2,224 


FPFPIIPFIPI PID IF IF FFI IIPA III IF IPF AIF IF FI 9999999999 999999999 
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840 VDU31,0,2,17,2,231 
850 VDUS:MOVE0#32,1023-2%32: VDU18,0,1,5,232,4 
860 ENDPROC 


PROCfill_screen 
Just to tantalise you, here is the “board” the player will be 
using. 
We are already using "X%" and "YX" in the program, but line 
770’s use of LOCAL in effect sets up a different variable which 
will be used pig il ahd within this PROC only. That is, 
whatever is done to the X% and Y% of this PROC has no bearing on 
what any X% and Y% not called by this PROC may be doing. Of 
course, there is no need to re-use the same variable name in 
this way for this program, but in longer ones with lots of 
variables it may be necessary if only to conserve memory to run 
that program in. 
We want the screen TAB lines 2-30, and TAB columns 0-39 to 
represent the board, and therefore to be filled with shapes 
representing the RAM chips Pacman will be chewing through. The 
filling of the board is done within 2 "nested FOR...NEXT loops" 
ie one loop is nested within an outer loop - for every line 
(Y%), go across every column (X%=0-39) and put a character in 
that position. 


VDU 31 is exactly the same as PRINTTAB. 

800 VDUS! ,X% ,YA,¢224+RNDC4)) 

Line 800 could equally well have been written as: 

800 PRINTTAB(XY , YA) CHRS< 224+RNDC 4) ) 

The chip shapes were defined as characters 225-228, so by adding 
a random number to 224, we will guarantee that one of these 4 
characters only will be used. 


The next 2 uses of VDU3{i also show the way of getting colour as 
well as a user-defined character printed out: 
840 VDU31 ,0,2,17,2,231 

could have been written as 
840 COLOUR 2:PRINTTAB(O, 2) CHR$231 
ie VDUI7 means “change text colour” (as opposed to graphics 
colour), “to the colour of the next number" in this instance, to 
colour 2 (which at line 360 we defined as blue). 


If you type in the part of the program listed above, the program 
should run until it gets to line 140. 


Next month: points 4-6 - playing the game (along with the rest 
of the program lines). 
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This is the first of the 19&6 Help columns, which this year 
I will be presiding over. 

In case anyone’s interested, I’m a professional programmer, 
and 1’ll be calling on other members for hardware help. 


Well, obviously you all Know everything about BBCs, because 
Bruce hasn’t received anything for this column recently. I’m 
doing this at fairly short notice this time, so I’ll just have 
te invent some problems, and you'll have to tell me via Bruce 
which ones I should have solved. 


i. At the last Wellington User Group meeting, I was shown half a 
page of justified text printed from Wordwise. The last line of 
one middle paragraph was about twenty characters and five words 
long, but had been spread out over the whole line. Other short 
lines had been correctly left unjustified. 

Does anyone have any idea why this could have happened? 


ED’S NOTE: You all may have noticed that Beeblet is lined up 
down right and left edges (ie justified) - I get lots of these 
problems. Make sure that there are no hidden control codes at 
the end of the line (ie. delete everything up to the next 
sentence}, then add at least one carriage return - another if 
you want to separate your paragraphs with blank lines. 


All problems are really lack of Knowledge, sco here is some 
to add to your collection. 


2. Did you Know that *Build files can include comments? 
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If you begin a line with ‘* ‘, it is ignored by the 
operating system, so you can put anything you like after it. 


3. *Build files can be editted by any word processor or text 
editor that can produce a text-only file (that is, without 
control characters other than carriage return and line feed). 

If you are using Wordwise and want to include comments (see 
2), use the embedded command "“PCx" where x is an unused 
character. This redefines the Pad Character (which produces a 
anes when printed) from " " to x. I usually use # (hash) or ~” 

ilde). 


4. If your program is so long that every byte is important, try 
abbreviating reserved words when you type them in. The reason 
for this is that after the line has been entered, it is 
tokenised by BASIC (reserved words like PRINT are replaced with 
a single byte). The line therefore becomes shorter than when you 
typed it in. By abbreviating the reserved words, less bytes are 
thrown away during the tokenising process, so you fit more into 
the line, and reduce the number of lines, with their associated 
four byte overhead. 


5. Finally, HE LP! What would you like to see here next time 
? Do you Know all about BASIC? What don’t you Know about modems, 
assembly language, disk filing systems and choosing them, 
sideways RAM/ROM ? 

Well, don’? just sit there... 


Ey 
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GETTING AWAY FROM GAMES 
Anne F. 


This was Fraser’s problem in Auckland - how to do something 
useful, like solving equations, instead of adding to High 
scores. He even sent down example. 


So apart from Ape all you who want their computer to do 
maths (after S.C and UE???) to the User Guide Sample Programs 
(the one in particular that solves quadratic equations), here is 
a program to produce the answer to Fraser’s initial offering. 


THE LISTING 

The essential lines are lines 96 - 140. The rest is “padding”. 
Reference was made to Chapt 26 Operator Precedence to check on 
the order the Beeb does its arithmetic. 


i@ REM to get Fraser away from games! ! 

26 REM and into getting a Ph.D in Computerised Maths 
36 MODES 

46 oe equation to solve is:" 


PRI 
6@ PRINTSPC4"1.5¢4x)¢y)" 
7@ PRINT’y = ww CLOGCI+P/Q)3" 8&6 PRINTSPC6*2 


@ INPUT’"Value for x",x 
168 INPUT"Value for z",z 
118 INPUT"Value for A" ,A 
426 INPUT"Value for P*,? 
136 INPUT"Value for Q",@ 
146 ae = "01 .5*x*z*LOGC 14+P/Q)/( 2248A) 


The program could be made tc loop round itself to allow you 
several opportunities to try out different variables. Add: 

85 REPEAT 

143 REPEAT 

145 INPUT’ "Another set of Variables?" ,ans$ 

147 UNTIL INSTR¢"YyNn" ,ans#) 

149 UNTIL ans#="Y" OR anst="y" 


The whole program could in turn be put in a larger loop which 
asks you to input the equation as well. Have fun. 
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COMPUTER IN THE KITCHEN? 


Sadie Ash 


What a crazy idea - flour down the Keyboard, fruit juice smeared 
over the VDU, toast in the disc drive... the quickest way to 
wreck a computer surely!! 


However, with the setup I have acquired, I wouldn’t be without 
it. The kitchen is very small, with limited bench space, and I 
was constantly bending down or stretching up to get the next 
appliance, trying to find temporary bench space for it and a 
power point within reach of its cable. To make matters worse, 
there was a totally inaccessible nook beyond a bit of bench that 
was actually quite a reasonable size. As the family grew and 
more food preparation was needed to cope with various allergies 
(both real and assumed), I got more and more frustrated with the 
Situation. Whilst there was money for appliances, or hubby's 
hobby, or car repairs just before his weekend in Taupo fishing, 
something as major as a Kitchen extensicn and remodelling was 
out of the question. 


A few months back I took a leaf out of the fair ground 
(metaphorically), and built a ferris wheel in my Kitchen' It 
centred in that hitherto useless nook, and thus was fairly 
economical with space that mattered. The idea was, that since 
seats on a ferris remained parallel to the ground while the 
wheel rotated, these ‘seats’ could accomodate Kitchen 
appliances. (You thought I should have one in the front jungle 
i attract the neighbours’ Kids??) A diagram may be more use 
or yOu... 


Key: 

i Food processor - cutdoes Mac the Knife 
2 toaster - 4-slice job 

3 Microwave - tsunami-size 

4 "reserved for future expansion" 

> Wotec grilla-oven - good for chops, chumps and chimps too 

6 Crockpot 

7? sandwich makers 

8 jug and percolator - use only "Boggs filters & grounds 

9 electric frypan - came with 5 Year "never wash" guarantee 

{0 cake mixer - most used in conjunction with Capt. Hook’s hand 
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ewitches 





or 
beastie 


At the centre of the wheel, as an axle, is a multiplug box which 
all the appliances plug into, so they are ‘on’ ail the time.It 
rotates round, so designing a cable from it to the mains that 
didn’t twist as it rotated was a thrilling challenge for an 
electrician friend who prefers to remain anonymous. The axle 
now incorporates a motor, and there is a row of switches on a 
wall, Press a switch, and the wheel rotates to bring that 
numbered seat round ta meet the main bench. A bracket slides 
cut from the main bench to add further support while the 
appliance is in use (food processors and cake mixers can walk, 
and the microwave is heavy!) 


HUBBY’S HOBBY 

See diagram on next page... 

Micro User Bob’s wife Andrea had all my sympathy. "Beeblet’s” 
Fischer-Technic advert in December looked like wrecking my 
Christmas budget, as well as canmnibalising the Kids’ Lego. As 
hubby showed off his latest budget-wrecker though, this time I 
could see a faint glimmer of an application relevant to me. 
Previously, the only use the computer had for me was to get the 
Christmas newsletter done - I wrote it out once by hand, neatly, 
legibly, and spelt correctly, showed variations for different 
relatives, amd handed it to hubby to produce the umpteen 
personalised copies he bragged the computer could do. He bribed 
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one of the Kids. Kid claimed he needed ‘Spelicheck’ as well. 
He did too. Must have a word with his optometrist. 
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clock 


Ar.;w2: now I get an extra 10 minutes in bed each deg vhile 
the computer starts breakfast!! The night before, I fill the 
Kettle, the coffee percolator, place 19 slices of bread in a 
pile beside the toaster, crack a dozen eggs into the food 
processor with a bottle of milk, and place a bowl of porridge 
mix in the microwave. Upon pain of no tv for a month, the last 
person to use the computer boots up an execution file that looks 
like this: 
| clock 0630 

*beastie 

ferris 

wave simple 500 

clock 0635 

Kettle 

perc 

proc 3 20 

toast 

end 


You want an explanation? 
clock 0430 when ‘it is 6.30am, do the following:*beastie 
| calls the beastie robot start-up routine (which 
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includes checking its own battery charge etc, and 
initiates a menu; the first response to that being 

ferris robot trundles off to the kitchen, climbs its ladder 
on to the bench and readys itself to activate the 
ferris wheel. 

wave bring microwave into position, and call up programs 
peculiar to its operation. This time it is a 

simple series of instructions - not your ‘cook on medium heat 
3 minutes then High for 10 minutes 

500 just activate the timer for Smins 00secs and press the 
Start 3button. 

clock 0635 clever thing Knows if it’s taken more than 5 minutes 

it‘ll adjust this time. I could instead command “wait 

beep" in which case it would wait until the microwave 

beeped (Big Ears can tune in to this sound for the 


beastie) | 
Kettle turn the ferris to reach the Kettle and switch it on 
perc as for Kettle ~ both these routines include a weight 


test to ensure there is enough water in each before 
switching them on. 

proc 3 20 Bring round the food processor, use speed 3 and give 
it a 20-second burst. One of these days I’ll see if 
the Kids will believe eggshell is really bran flakes!!! 

toast We like watching this routine in play. There is a 
maximum number of slices the beastie can cope with - 
20 thick slice, or 29 sandwich slice. This isn’t the 
beastie’s fault - it’s just that with all the wheeling 
round, such a high stack is unstable, and the #*amxx 
mice get a real feed from the spinoff. The beastie 
has a program that makes it find the top of the stack 
of bread, take the top slice off, put it in slot 1 of 
the toaster, go back for bread for each of the 3 other 
slots, set the toaster timer and push the lever down. 
It waits with its arm over a slot until a piece of 
toast pops up into it, empties all 4 slots onto a 
separate plate, goes and ba the next toaster-load, 
resets the timer down a little... it can cope with a 
part-load of only i slice tcc. 


For beastie operation of the ferris, it helps to keep the 
appliances in pretty much the same position and angle on their 
seats eg the frypan thermostat is always on the side nearest the 
axle, as that is where the beastie has been taught to find the 
dial. : 


In fact, with the robot arm hitched up to hubby’s computer, 
family life is undergoing rather a revolution. But more about 
that another time... 
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ANNUAL GENERAL MEETING 


Held {9 March 1986 at the Royal Society Building, Turnbull St, 
Wellington. 


1, APOLOGIES 


Don Churchill 
2. MINUTES of previous AGM 
Having been published in April ‘85 ‘Beeblet’, they were taken as 


read. 


"That the minutes were a true and accurate record of the 
meeting” Moved Steve Rose 2nd Jean Heywood. Carried. 


3. Matters Arising from Minutes 

(a) Canvassing members — in October-November a questionnaire had 
been sent to all members, results were published in December 
‘Beeblet’, and favoured the status quo. 

(b) Paying for contributions or committee members - paying for 
articles was messy; competitions with a prize incentive had the 
effect of increasing contributions. The President asked that any 
further discussion be held to later in the meeting. 


4, Correspondence 
Ni} | 


d- President's Report 

This had been published in February ‘Beeblet’ 

"That the President’s Report be taken as read" Moved Neville 
Hudson 2nd Anton Erasmuson. Carried. 7 

The President then expressed optimism for the club’s future now 
Hu Master series was being released at quite a good price 
in NZ. 

He also repeated his thanks to Tim Ryan and Tim Lawson for the 
work put into the modem project; to Jean Heywood treasurer, 
Keith O’Callahan equipment and deals, Warren Willis, founding 
president now standing down from the committee, Anne Flower also 
founding committee member now standing down, Bruce Wills, 
editor, and the rest of the committee. 


6. Local Group Reports 
(a) Neison: 


We have eight Beeb owners in contact with each other to a 
reater or lesser degree, at least one possibly two are 
intending to join in the new financial year. At least four have 
said they would be interested in the VolksModems one has already 
ordered. Do they have to be members? All the Beeb owners will 
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have disc systems shortly, seven have printers and all but two 
have Wordwise /+ or View or both. There is an APTL Sidewise 
rom/ram,a RAMROM 15, a Solidisk 32K sw.ram, a Watford 32K(MK2) 
shaddow ram and a Watford(MK2) sw.rom/ram board amongst these 
eight sets of people. There is also a good range of firmware the 
most recent one written to work with Acorn DFS, had to have 
its 40 track accompanying disc changed to work on an 80 track 
drive ,is the Technomatic NOVOCAD , C A Drom. Maybe the owner 
will send in a review of that when he has his “eye in". The uses 
these Beebs are put to are many and varied but all machines are 
in frequent use. Two of them have recently been down to the 
Auckland Islands. 


In addition there is The BBC/Electron User Group (Nelson) of 
which you had contact through J.Phelps (incidentally - now moved 
to Hawkes Bay area and will probably join the National Group 
from there) . This has only been formed these past six months 
and has had several pleasant meetings of about twenty people 
comprising of six of the BBC owners and ten Electron owners. 1 
have tried to recruit at these meetings and have had the Notice 
re: "half-year-half fee" and Application forms on the Group 
notice board in Whitcoulls. 


(b) Wellington 

from Mike Hoult: 

Workshops were held at Wellington College, but so far little use 
had been made of the networking facilities available. The 
committee tried to meet suggestions of members for activities - 
a picnic had been held. Warren Willis’s Basic course had been a 
good drawcard. There was a library, with books, software etc; 
all contributions were always welcome. 


7. Financial report 
A preliminary report had been presented in February ‘Beeblet’; 
the audited accounts were presented to the meeting. Jean 


reiterated that the operating surplus came entirely from 
interest and bulk deals. 

A query about stock of old magazines: at the year end they are 
valued at cost - year just ended at $1; year earlier at 50c; 
stock of issues prior to this date were written off. New 
members are sent a list of which issues are still available and 
their contents. 

"That the financial Report be adopted" Moved Jean Heywood 2nd 
Steve Cosgrove. Carried 


9. Moved Anton Erasmuson 2nd Neville Hudson: 
That the 19&6 subscription for the period 1 April 1986 to 34 
March 1987 be set at: 
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a) annual fee $30.00 

b) student group rate (per person) $20.00 
c) half year fee (1/10/86-31/3/87) $15.00 
d) joining fee nil 


Amendment to motion: 

"(e) a rebate of $5 be given to renewing members who pay before 
{3 May 1986" Moved Jean Heywood 2nd Anton Erasmuson 

Some discussion on the budget, which had been drawn up with the 
rebate in mind. There was $6000 accumulated funds in cash, 
stock, a printer. 

Amendment carried. 

Amendment Moved Steve Cosgrove 2nd Steve Rose: 

"(¢) That the editor of the magazine and committee members have 
their subscription for the year 1986/7 waived" 

All committee members was queried; it was explained that the 
size of the group was such that the annual cash flow exceeded 
$30,000; What did 10 committee members do that might warrant 
waiving fees? The President read out job descriptions covering 
non-officer committee members for Membership Officer and 
Equipment officer as examples. 

The waiver should be seen not so much as a reward as an 
inducement for new committee members. 

The amendment was put and carried 23-4 on a count of hands. 


The amended motion in its entirety was put, Carried unanimously. 


10. Moved Keith O’Callahan 2nd John Andrew: 
That clause 2(b) of the Constitution be amended by adding to the 
end of it, the following sentence: 
"(The term ‘BBC microcomputer’ used within this Constitution 
shail be taken to include all computers marketed by Acorn 
Computers.)" 
Queried whether this should include machines using BBC Basic 
rather than just Acorn computers; but such machines as Commodore 
ee enue obs of the language also. 

arried. 


14.Moved Neville Hudson 2nd Keith O’Callahan: 
That the heading of clause 3 shall read: 

"3. MEMBERSHIP AND ORGANISATION" 

Carried 


{2. Moved Neville Hudson 2nd Keith O’Callahan: 

That a clause 3(e) shall be added: 

"3le) With the approval of the Committee, Subgroups may be set 
up to meet particular needs or interests within the membership 
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consistent with the objects of The Group, and may finance their 
activities through a separate levy." 
Carried 


13. Moved Steve Rose 2nd John Andrew: 

That clause {0(b) be amended to read: 

"{0(b) Proper books of accounts of the Group shall be Kept by 
the Treasurer who shall Keep such books up tc date. Where 
required, subgroups shall also Keep proper books of accounts and 
provide a financial statement to the Committee at the end of the 
financial year." 

Carried. 


44, Moved John Andersen 2nd Mike Hoult: 

That clause 10 (¢) be amended to read: 

"{0(#) All cheques, promissory notes, bills of exchange drawn 
and endorsements made shall be signed by any two of: the 
Treasurer, Secretary, and one other committee member nominated 
by the Committee. 

Carried. 


15. Election of Officers 


Position: Nominated: Moved: Seconded 
President Nei] Gordon Jean Heywood Anton Erasmuson 
Convenor Glyn Woodbury Jean Heywood John Andersen 
Secretary John Andrew Jean Heywood Steve Rose 
Treasurer Jean Heywood Steve H Glyn Woodbury 


These officers were nominated unopposed, and were duly appointed 
to these positions. 
“at least 4 committee members’: 


j Keith O’Callahan Jeff Hunt Nike Hoult 

2 ~=siTim Ryan Steve Rose Anton Erasnmuson 
Cin absentia - acceptance to be confirmed) 

3 «Steve Rese Anne Flower Anton Erasauson 

4 Neville Hudson Bruce Wills Anne Flower 

5 ~=Bruce Wills John Andersen Steve Rose 

6 Steve Cosorove Neil Gordon Anton Erasmuson 


Moved Cliff Waldren 2nd Robin Watt: 

"That nominations be closed" Carried 

Moved Robin Watt 2nd Cliff Waldren: 

"That all 6 nominated be elected to the committee" Carried. 


{6 General Business 

(a) Moved Jean Heywood 2nd John Andrew: 

"That an honorarium of $2500 be paid to Debbie Levett for making 
up modems" 

This payment had been built inte the price for the modems. 
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There was a written agreement that the modems were to be built 
and tested to our specifications, which had P.O. approval. 
Payment was to be made after work completed not in advanced. 
Carried. 

The availability of modems was explained to newcomers. 


(6b) Payment for magazine contributions: 

Discussion centred on 

For solicited articles only: not allowed by Constitution. 
Competitions - the committee approves disbursements on the 
editor’s behalf for prizes. 

Quality rather than quantity was wanted, so ask for readers’ 
nominations of the 5 best in a pericd eg 6 months 

Monthly prize for best article or program in that issue 

Lots of people doing different things, so why should writers 
only get a reward? 


Moved Steve Cosgrove 2nd Jeff Hunt: 

"That that committee investigate ways of recognising 
contributions to the User Group magazine" 

Encouragement, not necessarily monetary, was a way of increasing 
magazine interest. 

Carried 20 - 5 on a show af hands 


(c) Moved Jean Heywood 2nd Steve Cosgrove that a vote of thanks 

be given to the auditor Ron Henry. Carried 

Next year’s auditor needed to be appointed; Ron Henry was 

spb eigas nominated Jean Heywood 2nd Anton Erasmuson. 
arried 


(d) Moved Neville Hudson 2nd David Fung that a vote of thanks 
be given to the previous committee. Carried by acclaim. 


The meeting closed 9.29pm 
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ELECTRON COLUMN 


Well, it isn’t actually. It is not as if Steve €C. did net WANT 
to provide the column - the arrival of a baby in his household 
at the critical time drastically reordered his priorities. Mind 
you, he does seem to have got his hands temporarily on a Master 
te ; adc) where he was working in May 19837 ( Clue : see 
“Letters..."), 
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IT TAKES ALL SORTS 


OK. So I should be shot. This section contains sort listings. 
There isn’t a lot of documentation with them this month - you 
will just have to sort them cut yourselves. 


SHELLSORT AND QUARKSORT 


Supplied by Anton E. some time ago. Allegedly Shell Sort is 
the best general purpose “amateur” sort which will sort anything 
uickly. For up to i000 items it is faster than quarksort. 
uarksort is interesting in that : 

{/ It is an Erasmuson special 

2/ “Its called a quarksort because its mainly a quicksort to 
which is added another sort which carries out while A heb to do 
aoe ee which a quicksort needs." Anyway; I think thats what 
@ Said. | 


Both sorts will work with strings, integers or reals if the 
array variables are changed appropriately. This is most easily 
done with Search and replace on a wordprocessor. 


Persons interested in more details are invited to write to Anton 
care of the UG box. 


GENERAL PURPOSE SORTING PROGRAM 


I have had this sort of sitting here for a while too. Now that 
he Knows that its going to be published, Steve’s plans to 
document it have been brought forward a little... next month? I 
understand it has a few interesting features... 


{8 REN Quarksort and Shetisort 90 REN are sorted ano timed. 
28 REM Two sorting PROCedures. 108 FOR scan=.785 TO é.96STEP .1 


t,’8' 11@ NA-EXP(scan) 
rf Plena hereto 178  PROCrandom:REM Fake data © 
HE MODES: Pise Ae 130 TTINE 
68 DIM ASCIRRO: 148 REN PROCquark(1,NAD 


: (NA) 
78 REN AS(B) used in swapping 4 PROCshe I | 
88 REM Arrays of 5 to 3088 items 108  TH=TIME Ts 
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168 = PROCoutput 2848 REPEAT: IM=1X41 UNTIL IN=0% UR A$ 
176 = NEXT (9 OA$LID 
188 END 2058 «IF AS{I%)<AS( IA) THEN PROCswap(] 
198 | hh) 
268 DEF PROCrandon 2852 UNTIL T4284 OR ARPA) OASCIZ} 
218 FOR I7=1 10 NY 2054 IF AS(IA) (ASCP) THEN PROCswap(Py., 
228 «= T$=CHRS4644RND(26)) uA) 
238) = FOR Ji 105 20546 IF W4=0% THEN =-i 
248 TS=T$+CHRS(944¢RNDC 26)) 2658 =J4 
258 NEXT 2848 
268 | «AS T)=T$ 2062 DEF PROCsample:REM Quark PROC 
278 = NEXT 2664 JH=140/-P4 
288 ENDPROC 2066 FOR I4=PH TO PAt2 
298 2068  PROCswap{ 1%, RND(T/)+Pil-1) 
366 DEF PROCcutput 2078 = =NEXT 
318 FOR 14-1 TO NY 2072 ENDPROC 
328 «= PRINTTABCI“N0D4816) AS(1%); 2674 
338 = NEXT 2876 DEF PROCswaptX% 74) :REM Guark PROC 
348 PRINT’ N43" Items take "T4/188;* s 2678 IF X/=¥% THEN ENDPROC 
ecs,"/’ 2888 AS(BIRAS( XA) SASL MOHAS IE AS O= 
358 ENDPROL AS(B) 
1999 2882 ENDPROC 
2808 DEF PROCquark<PA ,&) 2999 
2082 LOCAL IX, U4 KA 3668 DEF PROCshel 1(NA) 
2084 IF P}=0% THEN ENDPROC 3662 IF NO{2 THEN ENDPROC 
2886 KA=FNpivot(P4 G4) 3084 LOCAL 14,024 
2888 IF KA<@ THEN ENDPROC 3086 TAR 1 FFF 
2818 TAEPi~1:J/=0it1 3008 REPEAT SIZ=1ZDIV2:sUNTIL IX 
2012 REPEAT 3018 REPEAT 
2014 REPEATSIZ=I¢+1 UNTIL Wed4-1 OR 3012 FOR WM = 144: TONY 
AS (TZ) ASCKA) 3014 IF A$ SZ) (ASC JZ-1) THEN PROC: 
2816 REPEAT: Fé=J4-1:UNTIL T4204 OR AS nsert 
(0A) A$ KA) 3814 NEXT 
2018 = PROCswap< 14 JA) 3818 = IY=TZDIV2 
2626 «= UNTIL TAd=0K-1 3928 = UNTIL 441 
2022 IF ASCIZ)ASCKA) THEN IEK-1 3622 ENDPROC 
2824 PROCquark (PA, 1%) 3024 
2626 PROCQuark(I/+1, vA) 3026 DEF PROCinsert:REM Shel] PROC 
2828 ENDPROC 3628 AS(B=AS( 0) 
2638 3638 Kia 
2032 DEF FNpivot(P4,@4):REM Quark FN 3832 REPEAT 
2034 IF G4>P/+4 THEN PROCsample 3834 | ASL KA)=AS(KA-1) 
2036 I4=PA: S4=P4 3636 KRKA-TA 
2038 REPEAT: IM=1Z+1 UNTIL IY=0% OR ASCP 3838 = UNTIL FNfnd 
A) OASTA) 3048 ASC KA )=A$S(8) 
2048 IF ASCIZ)(AS(PA) THEN PROCswap! 1%, 3842 ENDPROC 
PY) ELSE W/=14-1 | 3044 
2042 IF Y4=0% THEN =-1 3846 DEF FNfnd:REM Shel] FN 
2044 REPEAT 3848 IF KA=I% THEN =TRUE 
20460 UAE 3e58 IF Geren heer ELSE 
: te : =Ti ic 
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28 REM General Purpose sorting pragra 


fn 

36 REM written by Steve Cosgrove, Jui 

y 1985 | 

46 REM version 1.1, September 1985 

38 MODE 6 - 

68 PROCinit 

65 PROCtestdata 

78 PROCinpst 

88 PROCsort(sort_bytes ,datal inest-tir 
stsor ti) 

96 PROCsave 

168 PROCtidyup 

118 END 


128 

138 DEF PROCinit 

148 2 = £86688 : REM change the fi 
eld length of numbers in BRINTS 

150 maxchar4 = 127 : REM maximun ease 
r of charactors per line of data 

14@ eolnf = 13 =: REM End Of LiNe c 
harcter 

17@ eof/ = 8 : REM in VIEW the f 
ile is terminated with @D 86 

188 eae bs = $1:REM maximua lengt 
h of filename For cassette base 

198 suffix$="srt" : REM added to what 


ever filename is entered in PROC: 


ave 

208 datalinesé = 8 : REM total number 
cf lines input | 

218 firstsort/ = 1 : REM first aumber 
to include in sort. Usuaily 91 fer 
VT EW | 

228 first_byte/-&FO@:REN location of 5 
tart of VIEW file 

238 sortbyted4 = first.byte% : s REM loc 
ation of start of line "firstsort® 

248 last byte/ = firstbyte/4 : REM end 
of file marker, reset by PROCinpu 
t 

258 DIM tempi maxchar~ =: REM spa 
ce to be used in PROCswap 

268 invalid$§ = "* : REM charactors wh 
ich should not be in a filename 

278 FOR IZ = @ TO ASCL® *) 

288 «=F 1% <>) 13 THEN invalids = inva 

lidS + CHRS( 14} 
294 = =REM RETURN ics ok 


Slo enpalidS = iavat dé + CHRS{34) : 
EM ‘"’ is invalia 

328 ENDPROC 

323 | 7 

338 DEF PROCtest_data 

348 PA = tirstbytes 

356 FOR 1% = 1 TO 26 

368 4 = RND( 28) 

3780 CO FOR A= 1 10 

388 ?P4Z = RND( 1883432 

378 PZ = Ph + } 


468 NEXT 
418 PY = eolny 
415 PA=PA +1. 


420 NEXT. 

438 OPZ = eof 

448 ENDPROC 

456 

468 DEF PROCinput 

478 LOCAL pointer/,started/ 

480 REM this proceedure checks how muc 
h valid data can be found 

498 REM it does not process it at all 

495 pointer’ = firstbytes 


388 REPEAT 
318 = pointers’ = pointer’ + LEN(S$point 
eri) 4 | 


328 = REM begining of next line ~ 
338) 0oJF ANformatline AND NOTstarted/ 
THEN PROCdont_start ELSE started 
“= TRUE 
348 =REM this line is to avoid trying 
to sort VIEW format commands 
Joe dataliness = datalinesét 
368 = PRINT sdatalines/:* lines found. 
®; CHRS(13); 
378) =o Jast bytes = pointers 
388 = REM last byted points to the beg 
inning of next line, or EOF chr. 
398 UNTIL ?pointer% = ent 
686 PRINT “They are in mencry from * 
“tirst_byted:" to “:“last bytez’t 
he first " Firstsort%; :" are forma? 
ing tines." 
6J@ REM location of all lines of data 
tc be sorted 
628 ENDPROC 
638 
44@ DEF FN¢éormatl ine 
S58 REM In UTEW, lines used ¢ar formas 
"ing begin with a chr 3 127 


LPPFPIPRIFID IFPI IPS PIDD SAV III 449999 9994949949999994999994 


Mere eereer er reee errr rere teri Trier rrirrrrreeererrsgenes: 


bau = 6¢ LE'SiSpointern,1) 2= CHRS: 
im 7)) OR LEN($pointer%) = @) 


688 DEF PROCdont_start 

698 firstsortZ = firstsort% + | 

708 rere na = pointer + LEN(S$soint 
ery, 

718 REM Line number , and location, of 
current first line to sort 

720 ENDPROC | | 


738 oe 
oe DEF PROCsort(bot ton, top%? 


768 REM This is a bubble sort, 

778 REM it is bloody slow, but does nc 
{ disrupt the contents 

788 REM of memory toc much, as it cniy 
ever swaps a line with 

798 REM the line next to it 

888 REM PS - thats also why it’s so 5] 
ow 


ii? 


818 
828 LOCAL pointer_IZ pointer_2/4, swaps 
838 ig se cba to each of the string 


ing compard 
848 Pe swap checks whether or not lis 
t is sorted yet 
858 REM ie, if nothing is changed in a 
complete pass, sort is complete 
848 PRINT ‘"Now sorting"’’“the counter 
sa sates ates many loops remai 


878 REPEAT 

888 = pointer_it = bottoay 

898 swap% = FALSE 

988 = =counté = 1 

918 PRINT CHRS(13); top% - count * 

ra top? 8 me 

REPEAT 
pointer_2/% = pointer_int LEN($ 
ointer_i4)+] 

FNdo_swap THEN PROCswap 
pointer_i% = pointer_Z 
count/Z = countstl 
UNTIL count/>=topy 

988 top4 = top/-i 

998 UNTIL (NOT swap) 
1888 CLS 

1018 PRINT ‘"Sort complete* 
1828 ENDPROC 

1836 


928 
938 


948 
958 
948 
978 


1048 DEF FNdo_swap 

1658 REM this Function couid be modif:e 
d to sort on a specific Key 

ak = $pointer_2/ (S$pointer_iZ 

1 

18868 DEF PROCswap 

1696 REM this routine swaps two adjacen 
t strings in memory 


1188 swap% = TRUE : REM An 
element has been swapped 
1418 Stemp% = S$pointer1% : REM sa 


ve the first item 
1128 Spointer_iZ = Spointer_2/ : REM ov 
erwurite the first line with second 
1138 pointer_2t = = pointer_t7 + LEN($poi 
nter_1%) + 1: REM reposition poin 


ter 2 
3348 Spointer_Z. = $temp4  : REM pu 
: the first line “into its new A 


1138 ENDPROC 


1168 
1178 DEF PROCsave 
1188 LOCAL exit%,saved/ ,vpos4 
1198 topti,i 
1288 savedy = FALSE : REM haven’t saved 
the file yet! 
$218 REPEAT 
1228 ftlename$ = FNfilename(NOT saved 
4, i lename$) 
1225 exitd = (filenames = "") 
1236 IF saved/ AND exit THEN PRINT ’ 
"Saving again® 
1248 = IF (NOT exit%) THEN OSCLI <"save 
“¢¢ilename$t* "+ STRO~(¢irstby 
teZ)+" "+ STRE~Clast_byteZ)) : 5 
ea TRUE 


ages for second 

pe Mian Teil fe een THEN P 
NT ‘"File not saved® ELSE JF ¢ 
‘aT exit’) THEN PRINT "File save 


1288 INTL exit 
a ENDPROC 


3318 4 FNfilename(first_passZ,current 


133 


1278 


1328 aie exits, return, firstletter 


1238 errorA=FALSE 
7348 REPEAT 


{358 PRINT "Hit ¥ ts exit without Sau 


: n 
stg seayseaepug aqua Sas onesesessal | sa asss assis sass 


1266 IF currents $'e' tube bunt E!! ''' Stcuprehis| LA,2Js' ¢ resulta! 4 4-b + 
returs tc leave filename uncnas sult$ + MiD$icurrent$,J4,1) 
ed, "Cit is currently "current 1626 REM using @ accounts for the pos 
ah ** and save again.” ibility of current being °* 
1378 = PRINT "Otherwise enter a " 1638 REM Otherwise print, and include 
1388 IF ‘NOT first_pass/) THEN PRINT in result, any valid charactors 
“new * 1448 
1398 = PRINT Fi tenane.* 1658 
1408 «=F first.pass% THEN PRINT "You w 1668 REPEAT 
11] be prompted to put “/"the ta 1678 new$ = GETS 
pe recorder onto record,” | 1686 JF INSTR¢ invalid$,new$ ) THEN V 
1418 oF firstpass% OR error’ THEN PR DU 7 ELSE PRINT new$; : IF news 
INT “The filename must be less" ’ = CHR$(127) THEN result$ = LEFT 
"than “snamelength2" charactors ${result$, LEN(resul t$)-1) ELSE 
tong. "’ "The suffix “."ouddixd IF new$ {> CHRS(13) THEN resul t$ 
will be added’’* if appropriate = result + new$ 
iy 1498 UNTIL new$ = CHR$(13) 
1428 = firstletter$ = GETS 3786 VOU 18 : REM Tine feed — 
1438 = returns = (firstletters = CHRS< 74g 
- 13)) 1728 = result$ 
1448 exitZ = (firstletter$ = "X") OR 4739 
geen = "x*) OR return 1748 DEF PROCtidy_name 
{758 tring te t each char 
1458 iF exith A AND (NOT return) THEN “aie le peer ee earns 
Currents = 1768 IF CINSTR(current$,".") = 8) AND ¢ 
1468 JF (NOT exit%) THEN current? = F (LINicurrent$) + {4 LEN( suftix$)) 
Ninput(firstletter$,invalid$) : (= samelength%) THEN current$ = 
PROCtidy.nase urrent$ + °.° ¢ suftix$ 
1476 «REM if the first letter is an "X 1778 FOR I% = @ TO LEN<current$) 
", "x", or RETURN, this line is 1786 REM assumes a suffix will be sep 
mitted erated by a dot. 
1488 «REM otherwise it is totally tran 179@ REM adds suf¢4ix if one does not 
sperant to the user already exist, 
1498 =F (LEN(current$) >= namelength’ i599 REM and it does not make the nan 
) THEN errord = TRUE : current$ e toc long. 
=" 3 UU 7 . - 1818 — ENDPROC 
1586 mo a AND returnz T i909 
errors = { 
1510 UNTIL (NOT error) OR exitZ gap nA Coie 
a = currents 1858 FOR check = 1 TO LEN( invalids) 
v= f 
1548 DEF FNinput(currents, invalids) ee ade 
1558 REM first charactor(s), list of in jo7, IF position% > @ THEN PRINT *C 
valid charactors for input haractor number "position is 
$5468 LOCAL result#, new$, 14, flagt invalid.* 
1578 REM string to be output, each char tpoe NEXT 


actor read, counter for Joop 

1586 result$ = °" 
{598 FOR 14 = 8 TO LEN{current$) 
188 


1438 


val ids, Mids(current$,14,1)) 
TF ¢7% > 8) AND vay THEN YEU 7 
4 THEN PRINT 


ELSE IF 1% 3 NID 
tHtteTeeeeeeteterertterttttes | 


IF 3% > @ THEN flagé = INSTR‘ tn jc 
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{R898 = {positiony = 8) : REM te - no 
invalid charactors in name 


1986 

{91@ DEF PROCtidyup 

1928 = opti, ! 

$93@ RINT STRINGHEA, CHRSiTai3;": 


SORT pragram.” 
mice ete et eeeeeteetees 
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ADVANCED DISC FILING 
SYSTEM II 
Hierarchical Directories by Tony Krzyzewski 


The concept behind that rather horrendous name (by the way, it’s 
pronounced HIGHER-ARE-KICK-AL) is fairly simple. Each file 
stored on disc is given a name in order to make it unique. In 
order to Keep track of lots of filenames we organise them into a 
directory, rather like the contents of a book. For example 


THISFILE 
THATFILE 
MYFILE 
YOURFILE 
HISFILE 
HERFILE 


The ADFS also stores information concerning whereabouts on disc 
the information is stored and where in memory it came from. 
Normally you can’t see this information as it is hidden, but 
later om we will leok at commands to let us see this 
information. With only a few files in the directory it is easy 
to see what files are available. Once we get a large number of 
files it becomes rather cumbersome. It is because of this that 
sub-directories were introduced. Instead of a directory only 
being able to contain files, it may also contain directories. 
These subdirectories may in turn contain more files and 
directories. In order to distinguish the directory we started, 
from all the other directories, we call that directory the ROOT. 


Let’s look at a directory structure: 


MYFILE YOURFILE HISFILE GAMES HERFILE ACCOUNTS THATFILE 


= Ee ES oe EE OS $8 ET EEE ED a 2 Ge eee ee eee ee 


t t i I $ 
SNAPPER HOPPER FRAK 


PAYABLE RECEIVABLE 
i i 


nb Ge ee 8 Ga a ee eae aD « eee ee 


i 
JAN FEB JAN FEB 


PPLFPPPPIFIP FIFI FIFF PIF IP IDI III PFI 9949999 999994999999994494 
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In this example, the ROOT directory contains the following 
files: 

MYFILE 

YOURFILE 

HISFILE 

HERFILE 

THATFILE 


and also contains the sub_directories 
AMES 
ACCOUNTS 


The eee. directory in turn contains 3 files 
SNAPPER 

HOPPER 

FRAK 


whilst the accounts directory contains 2 subdirectories 
PAYABLE and RECEIVABL 
but doesn’t contain any files. 


Both the PAYABLE and RECEIVABLE sub-directories contain 2 files 
JAN and FEB | 


It is here that you will note that a filename does not have to 
be unique - IF, and ONLY IF, the two files are contained in 
SEPARATE sub-directories. 


A few questions come to mind here: 
How do we Know which FEB file we are talking about, and how do 
we tell the sub-directories from the files? 


Before these questions can be answered, we have to define some 
naming conventions: 
i. An OBJECT is a file name or a directory name 
2. A DIRECTORY is a collection of objects (up to 47) 
3. A FILE is a block of data or a program that can be loaded 
into the computer. For the sake of these examples we shall 
treat all files as LOADable BASIC programs. 
4. <A file name or directory mame may be up to 10 characters 
long and the mame shall not contain any of the following 
characters: 

#%.:$$&* nor Space 
5. The ROOT directory is referred to as $ 
6. The directory currently selected is Known as the CURRENTLY 
SELECTED DIRECTORY (CSD) and may be referred to as 2 
7. The directory immediately preceding the CSD in the structure 


PPPPAVIII AIFF III 9949999999999 999999999949999999994999999944 
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is that directories PARENT and is referred to as “ 

With that lot behind us, some examples. 

If we were currently in the ACCOUNTS directory (next month shows 
how to get there!): 

The CSD would be ACCOUNTS 

The CSD contains two objects PAYABLE and RECEIVABLE 

The PARENT directory is $ 


Next month we answer those two questions, but before then, here 
are some for you. 


i. How many sectors are there on a double-sided, $0 track disc? 
2. What is the Parent directory of GAMES? 
3. What is the Parent directory of PAYABLE? 
4, In what sub_directory is the SNAPPER program’? 
erreererrerrgererreer errr rere rere rey 
font PLINTH jaf 
For the BBC Microcomputer 
CTI: *,..-LISP-l ike?" 
POM: °...allows greatiy-increased user-friend! iness* 


Core Users Weekly: °...highly structured..." 
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Biblet: "Provides a new standard to harness and 
combine Beeb capabilities with those of 
modern screens" 


No extra cables or ee needed; 

Ergonomically designed - will not Aree 3 further 
expansion boards - slots allow other cables etc 
free movement to scarce inside-Beeb spaces. 


Full documentation provided; includes full Assembly 
Instruction Set 
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CIVILISED MODE CHANGE 


The Centaur, Hamilton 


Editor’s note: this was contribution was sent in last year and ! 
have finally managed to type it in (disc or tape material alwys 
gets precedence...). 


Well, after being made to feel extremely guilty after readin 
the latest Beeblet I have decided to make my presence Known. 
have been using a BBC micro for two years (almost non-stop) and 
have a reasonable Knowledge of what makes it tick. When (if) I 
contribute programs, hints etc. ta the Beeblet they will mostly 
be specific to the BBC micro, and probably not work on the 
Electon (a machine I am not familiar with so that if a routine 
works om it, it wasn’t my fault). I will also try in future to 
answer any HELP queries anyone may have on the condition that 
they relate to the Beeb. 


Just to whet everyone’s appetites, I have included a routine 
which will allow you to change screen mode without clearing the 
screen. Why would you want to change screen mode without 
Clearing the screen? Well take the example of a game that loads 
a HiRez, complicated background. Off tape this can take up to 
{5 minutes. Now suppose the game switches to mode 7 to display 
the HiRez scoreboard. Upon returning to the Hirez screen 
normally the picture would be lost, but with this routine you 
only lose the parttaken up by the Mode 7 screen. If necessary a 
copy of that section of the screen could be stored elsewhere in 
the machine and reloaded each time. — 


This routine uses a lot of unknown Op System calls and so will 
probably only work on O.S. 1.2. I realise that this makes me 
only of limited use, but when you start writing fast M/C 
routines they become machine specific. To use the routine just 
make Ak= (mode required): and then CALL (location code was 
assembled). A quick rundown of what it does: 


Lines Description 

40 Saves accumulator which contains mode number 
30-110 Zero al} the 0.8. VOU variables (X,¥,coords etc) 
120 Reset the character font locations to default 


FPPIFAPIVII FAA PIFD IFAD PID II 994949999499 99999999994949999499 
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130-410 
420-456 
460-610 
620-630 
640-660 
§70-770 


780-790 
800-960 


Reset mode dependant VDU variables 

Set System VIA for hardware scrolling 

Restore general VDU variables 

Set VDU status as read by OSBYTE &75 

Reset flashin colour timers 

This is the section that actually changes the screen mode by 
altering the CRTC registers 

Reset text and graphic colours etc. 

Restore last of the VOU variables, pointers to Jookup tables 
etc. 


And if all that hasn’t completely flummoxed you, then let me 
close by saying that once this code has been assembled, it can 
be saved to disk by typing #*SAVE filename startaddress +D6 


The code has been written so that it is completely relocatable 
(unlike socks) and so that it can be re-#LCADed anywhere in 


veers 2 STA K34F 586 LDA &C446,x 
1@ REM MODE CHANGE PROG -Ax 308 LDA &C43A,X S92 STA dee 

28 REN BY THE CENTAUR 318 STA 48361 gaa LOA #&C3 

38 328 BNE FUPA2 = gt STA RE! 

46 FOR T/=@ 10 2 STEP 2 0. 338 LDA #KBY = 28 LDA &C463,x 
58 P=k908 346. FURD2 é30 STA &8352 
68 OPT TY 358 ASL A 48 STX £8353 
78 PHA 366 TAY 658 LDA 8&43 
88 LOX #&7F 376 LOA &C486,Y 4é8 JSR &C5A8 
96 LOA #400 388 STA &83463 478 LOX &8355 
188 .LOOP! 398 .LO0P2 686 LOA &C3F7,X 
118 STA &D8 408 ASL A 698 JSR SEARO 
128 STA &B2FF,X 418 BPL LOOP2 788 PHP 

138 DEX 428 STA &8362 718 SE] 

148 BNE LOOP! 438 LOY &€448,X 728 LOX &C4469,Y 
158 JSR &CD87 449 STY £03546 738 LOY 8468 
148 PLA 458 LDA &C44F .Y 746 LOOPS 

178 LDX #&7F 468 JSR &E9FS = 758 LDA &C46E ,X 
188 STX &6366 478 LDA &C44B,Y 7646 JSR &CP5E 
198 BIT &&28 4g@ JSR &ESFS = 778 DEX 

268 BM] FWRDI 496 LDA &C459,Y 788 DEY 

218 ORA #&64 580 STA &8354 9798 BPL LOOP3 
228 .FWRD! 516 LDA &C45E,Y 888 PLP 

238 AND 8467 528 STA &A34E 818 JSR &C839 
248 TAX 538 TYA 828 JSR &C9BD 
258 STX &6335 548 ADC #82 836 LDX #488 
268 LDA &C€414,X = 559 FOR #&87 = 248 LDA &@34E 
2768 STA &6368 548 LSR A 5a STX £8358 
288 LDA &C3FFLX = 578 TAX R4e STA &A351 


FPITPTT TTT TT SETH RRC I Tet tet e ett rt ett tt teeth ttt 
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876 USR &CoFé 958 STY &@35€ 
888 LDY #&8C 968 LOX #&86 
898 JSR &CA2B 9768 STX &6269 
788 LDA &8358 988 STX &€318 
918 LOX &8356 998 STX &8319 
928 LDY &C454,X 1606 RTS 

| 9% STY &@350 {918 } 
9468 LOY #&CC $928 NEXT 


BUDGET MEMORY BEXPANDER 
Unknown | 


On page 237 of my User Guide it explais DIMensioning of arrays 
and also how to reserve bytes in memory for special 
applications. An example is given and also a practical 
illustration on page 463. Turning the cassette motor light on 
does not appeal to me as the ideal illustration especially as I 
have to use BREAK to turn it off. A routine to change the 
DiIRectory on a disc would be 


10 DIM C 4 

20 $C="DIR A" 
30 X%=C MOD 256 
40 Y%=sC DIV 256 
20 CALL GFFF? 


and RUN. hoops I didn’t reserve enough space and it 
worked. But 0 counts as well so its alright. But what if it was 
not enough... lets make the 4 a 0.. it ran again.. well, how 
about ~-4.. did it work.. backward RAM.. So all you need is some 
method of putting all the programs into DIM statements and the 
lack of memory is solved. 

CLASSIFIBA DADS 
(no charge for members) 

FOR SALE: 
H.C.R. Sideways RAM board, write protectable, easily fitted, $75 
Two 6264LP-8K RAM chips; new, $20 
Phone E. Wong, Palmerston North, 699-72 (evenings) 
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LE TTERS..... 
David Fung | 


It was in May 1983 upstairs at the then PROJECT COMPUTER that I 
came across a bunch of amiable but somewhat off beat characters. 
With their help and encouragement I have wrestled with the many 
problems of a long distance programmer in the development of a 
Chinese Word Processor on the Beeb in these three years. By May 
1986 the project will be completed if Acorn does not spring on 
me another new machine. | 


Some of the user group members and some non members had made 
enquiries or had written to me about my project. I have been 
very remissed in responding to them and I offer my sincere 
appologies. My excuse is that I desperate wanted to put 4&8 hours 
into a 24 hour-day. In the last year or so I have literally 
hand-crafted over 4300 chinese characters and entered them into 
“tei files. The time for this alone has been well over 2000 
ours. 


The problem of constantly access the disc files for data meant 
that the operation was slow (even if it was faster then other 
systems), and that the clicking on and off was very hard on the 
disc drives. The rest of my time was spent in hassling David 
Harris to get me the Solidisk SWR 256, which was never produced 
until now. Eventually the SWR 128 came which partially helped 
with less then {00 KB ramdisc. This was achieved amidst buggy 
software, ay coy, several modifications, and upgrades of the 
DDFS Rom. Came January 1986 ( November in U.K - Time warp! ) 
OPUS came up with the Challange 3 disc drive with 2 x 256 K 
Ramdiscs. This was pivotal in the whole development, with the 
pecanle wane of the data is now instantaneous and 
blissfully silent. 

The programme had to be modified of course. This was about done, 
and I wrote to Joe Joyce of Barson about it. He said " Come to 
have a look at the Master 128 ". I did, now I am rewriting the 
Programme once more. I will take a while longer but will be 
worth it because with the Master 128 I would not need the 6502 
second Processor, without loss of speed, and, actually less 
expensive to configure the hardware. 


This then is the news up to the moment, next time will be the 


real thing. Many thanks to every body with their interest and 
assistance, and especially your own encouragement. 
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HALL OF FAME 

PUBLISHER: GAME HISCORE SCORER 
Aardvark rak ; ; Andrew P. 
Monsters 175,110 Geof P. 
Zalaga 590,100 Allister J. 
32,090% Nick C. 
Acorn Arcadians 34,740 Rasik R. 
Aviator 5,610 Joanne C’s Dad 
Coun tdown 246 Andrew 
Meteors 46,200 Andrew P. 
Monsters 149,730 Rupert T. 
Planetoid 413,875 Peter J. 
Rocket Raid 140,777 Mark R. 
Snapper 250 ,000 Susan 
Starship Command 9,495 Robert N. 
Super Invader 07,200 8=©6Kiran R. 
A&F Cyton Attack 157,970 Aaron 
Chuckie Egg 319,450% Greg C. 
Alligat. Bug Blaster 37,642 Steve W. 
AMC Om: Fortress 89,900 Andrew P. 
Bugbyte Twin Kingdom 385 A. Beeston 
Comp.Con Android Attack 236,195 Peter J. 
Dr Soft 747" 205 Steve W. 
Firebird Bird Strike 11,340 David G. 
14,980% Patrick C. 
FG Soft. Mutant Defender 6,900 Steve W. 
Lords of Time 925/1000 Steve W/Kerry K. 
Snowba!l | 900/1000 Steve W./Dianne 
Micro. Pow Castlequest 30 Jeremy B. 
Prog Pow Felix in Factory 13,150 Duncan’s Flatmate 
Frenzy 915,468 Dianne T 
Killer Gorilla 91,000 Susan 
Laser Command 109,225 P. Leadley 
Moon Raider 112,350 P.Leadley 
Sup.Soft Q#Bert 43,825 Peter J. 
Mr Wiz 21,050% Chris M. 
Roadrunner 118,900 Duncan’s Flatmate 
? Dr Who 35,240 Duncan’s Flatmate 


Electron Version. 
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USER GROUP MEETINGS 


AUCKLAND : “meets 2nd Wednesday of the month, 7.30pm, Conference Rooms, 
Auckland Secondary Teachers College,60 Epsom Ave, Epsom. ph 
Dave 770-630 x 5i8(bus) or Kerry 695-355, 
North Shore: meets last Wednesday of the month, 7.30pa, 
Salvation Army Hall, Glenfield Road, Glenfield ph Chris 
419-0543 (wk) 

CHRISTCHURCH: -fortnightly workshops, Monday 6.30pm at Hagley High School. 
ph. Michael 382-267. 


DUNEDIN: “first Thursday of the month. Phone Martin McDowal) 42-031 
HAWKES BAY: “Alternative months sie & Napier. Contact Kendall Napier 
Jo, Mitch Hastings 778-235. 


435-624, Bob Taradale 446- 
INVERCARGILL: -Phone Evan 330-444 Invercargill. 
PALMERSTON NORTH: -Phone Tom Skinner 83-009(wk) 


TAUPO: id ra second Wednesday @ 7pm. Contact David 84-215 ‘h), 

TAURANGA : “every second Wednesday. ph. Chris & Jane 65-076. 

TIMARU: -Phone Lloyd van der Krogt Timaru 61-412. 

TOKORGA: “meets first Friday of each month, Tokoroa High School, Spa. 
Phone Brian 67-625 Tokoroa. 

WAIKATO: -tirst Friday of the month 7.30pm Waikato Tech Institute. Ph. 
Alison or John, Morrinsville 6495. 

WELLINGTON: “meets usually second WEDNESDAY of the month, 7.30pm, Royal 


Society Lecture Theatre, Turnbull! St, Thorndon. Other dates 
advised in Beeblet regional news. 
‘Workshops: fourth Wednesday of month, other venues. ph. Don 
848-235 or Bery! 862-874 of Mike 785-437. 
OTHER CENTRES:  - let us Know and we will ees details here. 
THE NEWSLETTER: 
CONTRIBUTIONS:-most welcome. Listings should be sent in on tape or disc. (Tape 
- 2 copies, one at 300 baud please). Please include written explanation of 
listing: text and graphics only material welcome too. 
INES:- For a particular issue, the last day for material is the last day of 
e month prior to publication. 
ADVERTISING:- Rates are $20 per half page (camera ready), deadline as above. 


Copyright (c) BBC/ACORN COMPUTER USER GROUP OF NZ INC. 
Published monthly except January and mailed to financial members. 
MEMBERSHIP: 


Membership of the users group is on payment of an annual subscription from April 
to March. For the 1985/6 year it is: $30.00, plus $5.00 for Auckland & 
Wellington members as a local branch levy, which entitles attendance at meetings 
as detailed above. Joining or renewing members get all the back issues of the 
current year - those joining from { October may have half the annual sub waived 
and only receive newsletters from | October. 


THE BBC/ACORN COMPUTER USER GROUP OF NZ INC, P.0.Box 9592, WELLINGTON. 
Reproduced by BRYCE FRANCIS LTD ,WELLINGTON 


